object Kwgl_Teacher_Edit_Form: TKwgl_Teacher_Edit_Form
  Left = 234
  Top = 133
  Caption = #20219#35838#25945#24072#24405#20837
  ClientHeight = 458
  ClientWidth = 614
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Verdana'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Scaled = False
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object Panel1: TPanel
    Left = 0
    Top = 422
    Width = 614
    Height = 36
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    DesignSize = (
      614
      36)
    object btn_Exit: TBitBtn
      Left = 536
      Top = 7
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = #36864#20986'[&X]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = btn_ExitClick
    end
    object btn_Add: TBitBtn
      Left = 2
      Top = 7
      Width = 75
      Height = 25
      Caption = #28155#21152'[&A]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = btn_AddClick
    end
    object btn_Save: TBitBtn
      Left = 261
      Top = 7
      Width = 75
      Height = 25
      Caption = #20445#23384'[&S]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = btn_SaveClick
    end
    object btn_Cancel: TBitBtn
      Left = 88
      Top = 7
      Width = 75
      Height = 25
      Caption = #21462#28040'[&C]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = btn_CancelClick
    end
    object btn_Del: TBitBtn
      Left = 175
      Top = 7
      Width = 75
      Height = 25
      Caption = #21024#38500'[&D]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = btn_DelClick
    end
    object btn_Excel: TBitBtn
      Left = 372
      Top = 7
      Width = 75
      Height = 25
      Caption = #23548#20986'[&E]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = btn_ExcelClick
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 0
    Width = 614
    Height = 422
    Align = alClient
    Caption = #20219#35838#25945#24072#20449#24687#24405#20837#65306
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Kcdmb_DBGrid: TDBGridEh
      Left = 2
      Top = 16
      Width = 610
      Height = 404
      Align = alClient
      AutoFitColWidths = True
      DataGrouping.GroupLevels = <>
      DataSource = DS_Kcdmb
      Flat = False
      FooterColor = clWindow
      FooterFont.Charset = ANSI_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = 'Tahoma'
      FooterFont.Style = []
      IndicatorTitle.ShowDropDownSign = True
      IndicatorTitle.TitleButton = True
      OddRowColor = clInfoBk
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghAutoSortMarking, dghMultiSortMarking, dghDialogFind, dghShowRecNo, dghColumnResize, dghColumnMove]
      RowDetailPanel.Color = clBtnFace
      SortLocal = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = []
      Columns = <
        item
          EditButtons = <>
          FieldName = #25945#24072#32534#21495
          Footers = <>
          Title.TitleButton = True
        end
        item
          EditButtons = <>
          FieldName = #25945#24072#22995#21517
          Footers = <>
          Title.TitleButton = True
          Width = 82
        end
        item
          EditButtons = <>
          FieldName = #23494#30721
          Footers = <>
          Title.TitleButton = True
        end
        item
          AlwaysShowEditButton = True
          AutoDropDown = True
          EditButtons = <>
          FieldName = #25152#23646#32771#28857
          Footers = <>
          Title.TitleButton = True
          Visible = False
          Width = 71
        end
        item
          EditButtons = <>
          FieldName = #32771#28857
          Footers = <>
          Title.TitleButton = True
          Width = 160
        end
        item
          Alignment = taCenter
          AlwaysShowEditButton = True
          Checkboxes = False
          EditButtons = <>
          FieldName = #26159#21542#21551#29992
          Footers = <>
          PickList.Strings = (
            #26159
            #21542)
          Title.TitleButton = True
          Width = 77
        end>
      object RowDetailData: TRowDetailPanelControlEh
      end
    end
  end
  object DataSet_Kcdmb: TClientDataSet
    Aggregates = <>
    CommandText = 'select * from '#20219#35838#25945#24072#34920
    Params = <>
    ProviderName = 'tmp_DataSetProvider'
    RemoteServer = Kwgl_RDataForm.MyConnection
    AfterPost = DataSet_KcdmbAfterPost
    BeforeDelete = DataSet_KcdmbBeforeDelete
    AfterDelete = DataSet_KcdmbAfterDelete
    Left = 272
    Top = 96
    object DataSet_KcdmbCDSDesigner: TStringField
      FieldName = #25945#24072#32534#21495
      Size = 10
    end
    object DataSet_KcdmbCDSDesigner2: TStringField
      FieldName = #25945#24072#22995#21517
      Size = 10
    end
    object DataSet_KcdmbCDSDesigner3: TStringField
      FieldName = #23494#30721
      Size = 15
    end
    object DataSet_KcdmbCDSDesigner4: TStringField
      FieldName = #25152#23646#32771#28857
      Size = 10
    end
    object DataSet_KcdmbField: TStringField
      FieldKind = fkLookup
      FieldName = #32771#28857
      LookupDataSet = DataSet_KdPick
      LookupKeyFields = #32771#28857#20195#30721
      LookupResultField = #32771#28857#21517#31216
      KeyFields = #25152#23646#32771#28857
      Size = 30
      Lookup = True
    end
    object DataSet_KcdmbCDSDesigner5: TStringField
      FieldName = #26159#21542#21551#29992
      FixedChar = True
      Size = 2
    end
  end
  object DS_Kcdmb: TDataSource
    DataSet = DataSet_Kcdmb
    OnStateChange = DataSource1StateChange
    Left = 304
    Top = 96
  end
  object DataSet_KdPick: TClientDataSet
    Aggregates = <>
    CommandText = 'select * from '#32771#28857#20449#24687#34920
    Params = <>
    ProviderName = 'Update_DataSetProvider'
    RemoteServer = Kwgl_RDataForm.MyConnection
    OnReconcileError = ClientDataSet1ReconcileError
    Left = 272
    Top = 128
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '*.xls'
    FileName = #25945#24072#25913#21367#23494#30721'.xls'
    Filter = 'Excel '#25991#20214'(*.xls)|*.xls'
    Options = [ofHideReadOnly, ofExtensionDifferent, ofEnableSizing]
    Left = 304
    Top = 128
  end
end
